home *** CD-ROM | disk | FTP | other *** search
/ The Canadian & World Encyclopedia 1998 / The Canadian & World Encyclopedia 1998 - Disc 2.iso / mac / prime_CD / pb / PROFILE.DIR / 00075_Script_75 < prev    next >
Text File  |  1997-07-29  |  4KB  |  24 lines
  1. on setbiocredit pm
  2.   case pm of
  3.     19: return ["19,bio,1": rect(106,140,233,338),"19,bio,2": rect(181,155,473,272),"19,bio,3": rect(96,218,308,357),"19,bio,4": rect(109,177,312,391)]
  4.     18: return ["18,bio,1": rect(46, 124, 217, 289), "18,bio,2": rect(298, 106, 556, 355), "18,bio,3": rect(319, 97, 577, 346), "18,bio,4": rect(70, 94, 328, 343), "18,bio,5": rect(70, 99, 328, 344), "18,bio,6": rect(40, 105, 298, 350), "18,bio,7": rect(316, 102, 574, 347)]
  5.     "1" : return  ["1,bio,1": rect(346, 109, 604, 298), "1,bio,2": rect(427, 61, 574, 344), "1,bio,3": rect(83, 298, 556, 425),"1,bio,4": rect(352,57,607,423),"1,bio,5": rect(25,72,277,423),"1,bio,6": rect(25,72,319,438),"1,bio,7": rect(292,54,610,426),"1,bio,8": rect(292,57,607,423),"1,bio,9": rect(25,69,301,447)]
  6.     2 : return ["2,bio,1" : rect(46,199,284,382),"2,bio,2" : rect(60,141,285,378), "2,bio,3" : rect(323,85,572,374), "2,bio,4" : rect(287,210,583,407)]
  7.     3: return [",bio,1": rect(63, 171, 318, 416), ",bio,2": rect(280, 193, 598, 386), ",bio,3": rect(30, 199, 286, 373), ",bio,4": rect(101, 157, 310, 373)]
  8.     4 : return ["4,bio,1" : rect(424,160,612,248),"4,bio,2" : rect(300,235,598,322),"4,bio,3" : rect(58,120,373,318)]
  9.     5 : return ["5,bio,1" : rect(50,100,277,401),"5,bio,2" : rect(41,102,365,377),"5,bio,3" : rect(88,124,293,424)]
  10.     6 : return ["6,bio,1" : rect(84,95,309,404),"6,bio,2" : rect(336,75,592,370),"6,bio,3" : rect(35,231,584,387)]
  11.     7: return ["7,bio,1": rect(50, 200, 308, 389), "7,bio,2": rect(379, 137, 542, 391), "7,bio,3": rect(50, 200, 308, 389), "7,bio,4": rect(323, 147, 581, 336), "7,bio,5": rect(84, 121, 227, 404), "7,bio,6": rect(114, 144, 263, 389), "7,bio,7": rect(312, 189, 570, 378), "7,bio,8": rect(58, 165, 252, 400)]
  12.     8: return ["8,bio,1" : rect(55,188,262,384),"8,bio,2" : rect(332,230,601,389),"8,bio,3" : rect(178,145,481,253), "8,bio,4" : rect(60,166,202,412),"8,bio,5" : rect(108,122,233,432),"8,bio,6" : rect(120,139,301,415)]
  13.     9 : return ["9,bio,1" : rect(57,103,300,409),"9,bio,2" : rect(337,114,581,390),"9,bio,3" : rect(346,88,582,409), "9,bio,4" : rect(56,128,270,387)]
  14.     11 : return ["11,bio,1" : rect(65,106,307,391),"11,bio,2" : rect(285,102,598,390),"11,bio,3" : rect(294,79,590,372), "11,bio,4" : rect(130,76,523,283)]
  15.     12 : return ["12,bio,1" : rect(352,109,554,344),"12,bio,2" : rect(115,139,575,276),"12,bio,3" : rect(399,151,549,283), "12,bio,4" : rect(311,150,594,396)]
  16.     15 : return ["15,bio,1": rect(89, 108, 305, 366), "15,bio,2": rect(68, 81, 563, 249), "15,bio,3": rect(77, 120, 590, 264), "15,bio,4": rect(77, 120, 293, 390), "15,bio,5": rect(338, 78, 554, 348), "15,bio,6": rect(119, 78, 554, 246), "15,bio,7": rect(92, 99, 527, 267), "15,bio,8": rect(92, 99, 266, 390), "15,bio,9": rect(68, 90, 242, 381)]
  17.     16: return ["16,bio,1": rect(10, 131, 276, 302), "16,bio,2": rect(64, 168, 298, 389), "16,bio,3": rect(150, 132, 460, 248), "16,bio,4": rect(61, 170, 261, 379)]
  18.     17 : return ["6,bio,1" : rect(119,87,269,373),"6,bio,2" : rect(312,70,586,376),"6,bio,3" : rect(168,109,483,249)]
  19.     "10" : return ["10,bio,1": rect(23, 54, 353, 444), "10,bio,2": rect(23, 54, 341, 444), "10,bio,3": rect(278, 54, 593, 426), "10,bio,4": rect(317, 54, 593, 426), "10,bio,5": rect(50, 60, 326, 432), "10,bio,6": rect(50, 228, 602, 426), "10,bio,7": rect(50, 60, 347, 432), "10,bio,8": rect(50, 60, 347, 432), "10,bio,9": rect(44, 60, 296, 438)]
  20.     "13" : return ["13,bio,1": rect(44, 60, 296, 438), "13,bio,2": rect(317, 60, 602, 420), "13,bio,3": rect(341, 54, 596, 423), "13,bio,4": rect(275, 60, 605, 405), "13,bio,5": rect(44, 60, 278, 438), "13,bio,6": rect(44, 60, 605, 201), "13,bio,7": rect(296, 48, 548, 426), "13,bio,8": rect(44, 60, 605, 288), "13,bio,9": rect(44, 276, 599, 429)]
  21.     "14" : return    ["14,bio,1": rect(26, 78, 287, 444), "14,bio,2": rect(26, 78, 308, 444), "14,bio,3": rect(41, 75, 323, 441), "14,bio,4": rect(41, 75, 323, 441), "14,bio,5": rect(41, 75, 356, 444), "14,bio,6": rect(437, 72, 614, 417), "14,bio,7": rect(317, 54, 608, 423), "14,bio,8": rect(317, 54, 608, 423)]
  22.     20: return ["20,bio,1": rect(204, 66, 526, 222), "20,bio,2": rect(347, 170, 547, 379), "20,bio,3": rect(87, 219, 287, 428), "20,bio,4": rect(383, 72, 583, 281), "20,bio,5": rect(68,200,278,390)]
  23.   end case
  24. end